use "$dir\DataSCLB", clear
	// Full Program
		set matsize 10000
		// Keep Sample
		drop if Study_Arm == 1
		gen one = 1
		local vars EL_EGRA_PCA_Index MT_Program MT_Program one
		keep `vars'
		// Compute Percentiles of the Control Distribution.
		centile EL_EGRA_PCA_Index if MT_Program==0,centile(5 25 50 75 95)
		local i = 1
		foreach c in 5 25 50 75 95 {
			local c_`c' = r(c_`i')
			local i = `i' + 1
			
		}
		// Estimate Bounds
		tedistboundscicentered `vars', y0values("`c_5' `c_25' `c_50' `c_75' `c_95'")	
		
		
		
	// Reduced Program
		use "$dir\DataSCLB", clear
		set matsize 10000
		// Keep Sample
		drop if Study_Arm == 2
		
		gen one = 1
		local vars EL_EGRA_PCA_Index CCT_Program CCT_Program one
		keep `vars'
		// Compute Percentiles of the Control Distribution.
		centile EL_EGRA_PCA_Index if CCT_Program==0,centile(5 25 50 75 95)
		local i = 1
		foreach c in 5 25 50 75 95 {
			local c_`c' = r(c_`i')
			local i = `i' + 1
			
		}
		// Estimate Bounds
		tedistboundscicentered `vars', y0values("`c_5' `c_25' `c_50' `c_75' `c_95'")	